*=$0801
; 2018 SYS 2062
        !word   main-2, 10
        !byte   $9e
        !text   " 2062"
        !byte   $00,$00,$00
        
main        
      sei
loop      
      lda #100   ;wait for line 100
wait2 cmp $d012
      bne wait2

      lda #2     ;red
      sta $d020
 
      lda #200   ;wait for line 200
wait3 cmp $d012
      bne wait3

      lda #14    ;light blue again
      sta $d020
      jmp loop